MULTIPLE FIELD LOADER 


DECUS Program Library Write-up 


DECUS NO. 8-386 


The Multiple Field Loader is used to load paper tapes written in the BIN format into more 
than one field of core. When the user runs his program the Multiple Field Loader will 
automatically change the field. 

In the beginning of the loader the computer stops. The user then toggles the highest field 

in his machine into the SR. Next he depresses CONT. The program tape should start to 

load. 

To load a program with the Multiple Field Loader the user should do the following: 

1. Have the Multiple Field Loader in core and the Binary tape of the program he wants 
to load in the HSR. 

2. Toggle 0020g in the SR. Next depress LOAD ADDR and then START. 

3. The computer will stop. Enter the highest field into the SR, then depress CONT. 

4. The tape should read in. The AC bit 0 should be set and the rest of the AC should be 
cleared when the tape stops. If not, there is an error. Go back to step . 

To run the user's program proceed as any other program would load. 

NOTE: This loader would not be useful in the following: 

(Field 0) 7776/ 

7777/ 

(Field 1) 0000/ 


Tad I 55 
Dca I 45 
Jmp 7776 







PROGRAM LISTINGS 


INST 0120 
TEMP 0122 
ADR 123 
K7777 124 
K10 125 
CIFLD 114 
CFLD 113 
ZRO 126 


*0020 

START, 


BEGN, 


PACK, 


READ, 


CHANGE, 


CLA CLL 

HLT 

OSR 

DCA AMOUNT 
TAD AMOUNT 
CIA 

DCA COUNT 
JMS READ 
CLL RTL 
CLL RTL 
CLL RTL 
SNL 

JMP BEGN 
CLL 

JMS READ 
DCA ADR 
JMS READ 
CLL RTL 
CLL RTL 
SPA 

JMP END 
CLL RTL 
JMS READ 
DCA I ADR 
ISZ ADR 
SKP 

JMS CHANGE 
JMP PACK 


RFC 

RSF 

JMP.-l 


RRB 

JMP I READ 
0 


2 





CONT, 

TAD 1 K7777 
DCA TEMP 

TAD INST 

DCA 1 K7777 
JMS CONT 

TAD TEMP 

DCA 1 ADR 

JMP 1 CHANGE 
0 

CFLD, 

TAD CFLD 

TAD K10 

DCA CFLD 

ZRO 

TAD CIFLD 

TAD K10 

DCA CIFLD 

ISZ COUNT 

SKP 

JMP END 

6201 

CIFLD, 

6202 

END, 

JMP1CONT 
TAD AMOUNT 

INST, 

CIA 

DCA COUNT 
HLT 

5066 

TEMP, 

0000 

ADR, 

0000 

K7777, 

7777 

K10, 

0010 

ZRO, 

0000 


/MULTIPLE FIELD LOADER-RUN 
*66 

RUN, JMS CONT 

JMP 0 









PROGRAM LIBRARY 


DECUS NO. 

8-386 

TITLE 
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AUTHOR 
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Al though this program has been tested by the contributor, no warranty, express or implied, is made by the contributor. 
Digital Equipment Computer Users Society or Digital Equipment Corporation as to the accuracy or functioning of the 
program or related program material, and no responsibility is assumed by these parties in connection therewith. 







